home *** CD-ROM | disk | FTP | other *** search
/ JCSM Shareware Collection 1996 September / JCSM Shareware Collection (JCS Distribution) (September 1996).ISO / pimslist / mtrac30.zip / MARKS.SAV < prev    next >
Text File  |  1993-12-15  |  483b  |  31 lines
  1. ECHO OFF
  2. CLS
  3. DATE
  4. CLS
  5. ISAM
  6. RUNCOB MARK01
  7. CLS
  8. IF ERRORLEVEL 002 GOTO DRIVEB
  9. IF ERRORLEVEL 001 GOTO DRIVEA
  10. IF ERRORLEVEL 000 GOTO END
  11. :DRIVEA
  12. ECHO ON
  13. PAUSE  Place BACKUP DISKETTE in Drive A
  14. COPY *.FIL A:
  15. COPY *.KEY A:
  16. PAUSE  Remove BACKUP DISKETTE from Drive A
  17. ECHO OFF
  18. GOTO END
  19. :DRIVEB
  20. ECHO ON
  21. PAUSE  Place BACKUP DISKETTE in Drive B
  22. COPY *.FIL B:
  23. COPY *.KEY B:
  24. PAUSE  Remove BACKUP DISKETTE from Drive B
  25. ECHO OFF
  26. GOTO END
  27. ECHO OFF
  28. :END
  29. ISAM /F
  30. ECHO ON
  31.